home *** CD-ROM | disk | FTP | other *** search
/ BMUG PD-ROM BV3 / BMUG PD-ROM Version BV3 (CDRM1097900).iso / HyperCard / Games / CirclusMaximus™ / card_10513.txt < prev    next >
Text File  |  1991-03-02  |  2KB  |  108 lines
  1. -- card: 10513 from stack: in
  2. -- bmap block id: 10873
  3. -- flags: 4000
  4. -- background id: 7338
  5. -- name: Sector of a Sphere
  6. ----- HyperTalk script -----
  7. on mouseUp
  8.   set numberFormat to <0.000000>
  9.  
  10.   --Calculate Sector Area
  11.   get (pi*card field "Radius")*((2*card field "Height")+ card field "Radius r1")
  12.   put it into card field "Sector Area"
  13.  
  14.   --Calculate Sector Volume
  15.   get (2/3)*pi*card field "Radius"^2*card field "Height"
  16.   put it into card field "Sector Volume"
  17. end mouseUp
  18.  
  19.  
  20. -- part 1 (field)
  21. -- low flags: 00
  22. -- high flags: 0002
  23. -- rect: left=312 top=96 right=114 bottom=459
  24. -- title width / last selected line: 0
  25. -- icon id / first selected line: 0 / 0
  26. -- text alignment: 1
  27. -- font id: 3
  28. -- text size: 12
  29. -- style flags: 0
  30. -- line height: 16
  31. -- part name: Radius
  32.  
  33.  
  34. -- part 2 (field)
  35. -- low flags: 00
  36. -- high flags: 0002
  37. -- rect: left=312 top=119 right=137 bottom=459
  38. -- title width / last selected line: 0
  39. -- icon id / first selected line: 0 / 0
  40. -- text alignment: 1
  41. -- font id: 3
  42. -- text size: 12
  43. -- style flags: 0
  44. -- line height: 16
  45. -- part name: Height
  46.  
  47.  
  48. -- part 3 (field)
  49. -- low flags: 00
  50. -- high flags: 0002
  51. -- rect: left=312 top=143 right=161 bottom=459
  52. -- title width / last selected line: 0
  53. -- icon id / first selected line: 0 / 0
  54. -- text alignment: 1
  55. -- font id: 3
  56. -- text size: 12
  57. -- style flags: 0
  58. -- line height: 16
  59. -- part name: Radius r1
  60.  
  61.  
  62. -- part 4 (field)
  63. -- low flags: 01
  64. -- high flags: 0004
  65. -- rect: left=319 top=206 right=225 bottom=448
  66. -- title width / last selected line: 0
  67. -- icon id / first selected line: 0 / 0
  68. -- text alignment: 1
  69. -- font id: 0
  70. -- text size: 12
  71. -- style flags: 0
  72. -- line height: 16
  73. -- part name: Sector Area
  74.  
  75.  
  76. -- part 5 (field)
  77. -- low flags: 01
  78. -- high flags: 0004
  79. -- rect: left=319 top=245 right=264 bottom=448
  80. -- title width / last selected line: 0
  81. -- icon id / first selected line: 0 / 0
  82. -- text alignment: 1
  83. -- font id: 0
  84. -- text size: 12
  85. -- style flags: 0
  86. -- line height: 16
  87. -- part name: Sector Volume
  88.  
  89.  
  90. -- part contents for card part 1
  91. ----- text -----
  92. .500000
  93.  
  94. -- part contents for card part 2
  95. ----- text -----
  96. .250000
  97.  
  98. -- part contents for card part 3
  99. ----- text -----
  100. .125000
  101.  
  102. -- part contents for card part 4
  103. ----- text -----
  104. 0.981748
  105.  
  106. -- part contents for card part 5
  107. ----- text -----
  108. 0.130900